Celestin Apprentice 2/Apprentice-Release2.iso/Source Code/C/Snippets/MyGestaltValue/Selector.c

Text File | 1994-11-11 | 396 b | 10 lines | [TEXT/MMCC]

// This is the code for a Gestalt selector. It returns a value stored inside its own code.
// The value seems to be hard-coded, but in fact it can be modified at runtime by poking into the resource.
// It's rather dirty, but it works.

pascal OSErr main (OSType gestaltSelector, long *gestaltResponse)
{
    *gestaltResponse = 0xDEADBEEF;                                // Return a magic cookie
    return noErr;
}